gusucode.com > 酷维企业网站CMS管理系统 v2.1.0 > 酷维企业网站CMS管理系统 v2.1.0\code\NewsAdmin\nlei.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="pass.asp" -->
<!--#include file="conn.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
.style1 {font-size: 12px}
.style2 {color: #666666}
.style4 {color: #FF0099}
.style5 {font-size: 14px}
.style6 {font-size: 14}
body,td,th {
font-size: 12px;
color: #000000;
}
-->
</style>
</head>
<body>
<% if request("wang")="nlei" then %>
<form id="form1" name="form1" method="post" action="nlei.asp?wang=add">
<table width="54%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#5C85D6">
<tr>
<td height="28" colspan="2" align="center" background="images/admin_bg_1.gif"><strong><font color="#FFFFFF">文章分类添加</font></strong></td>
</tr>
<tr>
<td width="20%" height="33" align="center" bgcolor="#FFFFFF">分类名称</td>
<td width="80%" bgcolor="#FFFFFF">
<input name="nlei" type="text" id="nlei" size="40" /></td>
</tr>
<tr>
<td height="28" colspan="2" align="center" bgcolor="#FFFFFF"><input type="submit" name="Submit" value="提交" />
<input type="reset" name="Submit2" value="重置" /></td>
</tr>
</table>
</form>
<% End If %>
<% if request("wang")="add" then
nlei=request("nlei")
set rs= Server.CreateObject("adodb.recordset")
sql="select * from nlei "
rs.open sql,conn,1,3
rs.addnew
rs("nlei")=nlei
rs.update
response.Redirect("nlei.asp?wang=up")
end if
%>
<% if request("wang")="up" then %>
<table width="57%" height="59" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#5C85D6">
<tr>
<td height="28" colspan="4" align="center" background="images/admin_bg_1.gif"><strong><font color="#FFFFFF">文章分类修改</font></strong></td>
</tr>
<% set rs= Server.CreateObject("adodb.recordset")
sql="select * from nlei "
rs.open sql,conn,1,3
while not rs.eof
%>
<form id="form1" name="form1" method="post" action="nlei.asp?wang=save">
<tr>
<td width="10%" align="center" bgcolor="#FFFFFF"><%=rs("id")%></td>
<td width="64%" height="28" align="center" bgcolor="#FFFFFF"><input name="nlei" type="text" id="nlei" value="<%=rs("nlei")%>" size="35" />
<input name="id" type="hidden" id="id" value="<%=rs("id")%>" /></td>
<td width="13%" align="center" bgcolor="#FFFFFF"><input type="submit" name="Submit3" value="修改" /></td>
<td width="13%" align="center" bgcolor="#FFFFFF"><input type="button" name="Submit4" onclick="window.location='nlei.asp?del=<%=rs("id")%>'" value="删除" /></td>
</tr></form>
<% rs.movenext
wend %>
</table>
<% End If %>
<% if request("wang")="save" then
id=request("id")
nlei=request("nlei")
set rs= Server.CreateObject("adodb.recordset")
sql="select * from nlei where id="&id
rs.open sql,conn,1,3
rs("nlei")=nlei
rs.update
response.Redirect("nlei.asp?wang=up")
end if
%>
<% if request("del")<>"" then
id=request("del")
conn.execute("delete from nlei where id="&id)
response.Redirect("nlei.asp?wang=up")
end if %>
</body>
</html>
<!--#include file="boom.asp" -->